object Bioform: TBioform Left = 293 Top = 204 Width = 774 Height = 352 HorzScrollBar.Range = 1200 HorzScrollBar.Position = 8 VertScrollBar.Range = 2000 AutoScroll = False Caption = 'Bioform' Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] PixelsPerInch = 96 TextHeight = 16 object DetailBand: TQRBand Left = -8 Top = 57 Width = 1200 Height = 152 Align = alTop BandType = rbDetail Color = clWhite ForceNewPage = False Frame.Width = 0 Ruler = qrrInchesHV object QRDBText1: TQRDBText Left = 116 Top = 12 width = 177 height = 17 DataSource = DataSource1 DataField = 'Common_Name' end object QRDBText3: TQRDBText Left = 116 Top = 60 width = 177 height = 17 DataSource = DataSource1 DataField = 'Category' end object QRLabel1: TQRLabel Left = 8 Top = 12 width = 105 height = 16 Caption = 'Common name :' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] end object QRDBText4: TQRDBText Left = 116 Top = 36 width = 177 height = 17 DataSource = DataSource1 DataField = 'Species Name' end object QRLabel2: TQRLabel Left = 8 Top = 36 width = 77 height = 16 Caption = 'Real name :' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] end object QRLabel3: TQRLabel Left = 8 Top = 60 width = 65 height = 16 Caption = 'Category :' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] end object QRDBText5: TQRDBText Left = 116 Top = 84 width = 37 height = 17 DataSource = DataSource1 DataField = 'Length (cm)' end object QRLabel4: TQRLabel Left = 8 Top = 84 width = 68 height = 16 Caption = 'Size (CM) :' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] end object QRLabel5: TQRLabel Left = 8 Top = 124 width = 79 height = 16 Caption = 'Description :' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] end object QRDBText2: TQRDBText Left = 116 Top = 124 width = 581 height = 17 DataSource = DataSource1 DataField = 'Notes' end object DBImage1: TDBImage Left = 352 Top = 12 Width = 169 Height = 105 DataField = 'Graphic' DataSource = DataSource1 Stretch = True TabOrder = 0 end end object TitleBand: TQRBand Left = -8 Top = 0 Width = 1200 Height = 57 Align = alTop BandType = rbTitle Color = clWhite ForceNewPage = False Frame.Width = 0 Ruler = qrrNone object Image1: TImage Left = 12 Top = 4 Width = 69 Height = 33 Picture.Data = {} Stretch = True end object QRLabel6: TQRLabel Left = 96 Top = 4 width = 193 height = 36 Caption = 'QuickReport' AlignToBand = False Font.Color = 8404992 Font.Height = -32 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] end object QRLabel7: TQRLabel Left = 300 Top = 20 width = 61 height = 16 Caption = 'for Delphi' AlignToBand = False Font.Color = 8404992 Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] end object QRLabel8: TQRLabel Left = 476 Top = 20 width = 257 height = 16 Caption = 'Copyright (c) 1996 Allan Lochert / QSD as' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] end object QRShape2: TQRShape Left = 8 Top = 44 width = 733 Height = 5 Brush.Color = clNavy Shape = qrsRectangle end end object QRBand1: TQRBand Left = -8 Top = 209 Width = 1200 Height = 8 Align = alTop BandType = rbDetail Color = clWhite ForceNewPage = False Frame.Width = 0 Ruler = qrrNone object QRShape1: TQRShape Left = 8 Top = 3 width = 737 Height = 1 Shape = qrsRectangle end end object QRBand2: TQRBand Left = -8 Top = 217 Width = 1200 Height = 24 Align = alTop BandType = rbPageFooter Color = clWhite ForceNewPage = False Frame.Width = 0 Ruler = qrrNone object QRSysData1: TQRSysData Left = 676 Top = 4 width = 65 height = 17 Alignment = taRightJustify AlignToBand = True AutoSize = False Data = qrsPageNumber Text = 'Page ' end end object Table1: TTable Active = True DatabaseName = 'DBDEMOS' TableName = 'BIOLIFE.DB' Left = 36 Top = 272 object Table1SpeciesNo: TFloatField FieldName = 'Species No' end object Table1Category: TStringField FieldName = 'Category' Size = 15 end object Table1Common_Name: TStringField FieldName = 'Common_Name' Size = 30 end object Table1SpeciesName: TStringField FieldName = 'Species Name' Size = 40 end object Table1Lengthcm: TFloatField FieldName = 'Length (cm)' end object Table1Length_In: TFloatField FieldName = 'Length_In' end object Table1Notes: TMemoField FieldName = 'Notes' Size = 50 end object Table1Graphic: TGraphicField FieldName = 'Graphic' end end object DataSource1: TDataSource DataSet = Table1 Left = 68 Top = 272 end object Biorep: TQuickReport DataSource = DataSource1 ColumnMarginInches = 0 ColumnMarginMM = 0 Columns = 1 DisplayPrintDialog = False LeftMarginInches = 0 LeftMarginMM = 0 Orientation = poPortrait PrintOrder = qrColByCol ReportTitle = 'QuickReport Biolife demo report' RestartData = True SQLCompatible = False TitleBeforeHeader = False Left = 4 Top = 272 end object QRDetailLink1: TQRDetailLink PrintBefore = False Left = 100 Top = 272 end end